# write the path to the replication file here
your_path <- "/Volumes/USB DISK"
setwd(your_path)
# Create the final datasets
source("Generate Preferences CITIZENS.R")
source("Generate Preferences GOVERNMENT.R")
source("Data Set Up.R")
# Run Analysis
source("explaining congruence.R")
# add some plots
source("Plot 1.R")
source("Plot 4.R")
source("Plot 5.R")
your_path <- "/Volumes/USB DISK/Replication Archive"
setwd(your_path)
source("Generate Preferences CITIZENS.R")
source("Generate Preferences GOVERNMENT.R")
source("Data Set Up.R")
# Run Analysis
source("explaining congruence.R")
# add some plots
source("Plot 1.R")
source("Plot 4.R")
source("Plot 5.R")
your_path <- "/Volumes/USB DISK/Replication archive 12"
setwd(your_path)
# This code will determine which packages are already installed on your
# computer and only dowload the ones that are missing (this code will NOT update
# your packages)
source("LoadDownload.R")
source("Generate Preferences CITIZENS.R")
source("Generate Preferences GOVERNMENT.R")
source("Data Set Up.R")
# Run Analysis
source("explaining congruence.R")
# add some plots
source("Plot 1.R")
source("Plot 4.R")
source("Plot 5.R")
library(readxl)
student_data <- read_excel("/Users/lleemann/Downloads/hsb2_test.xls")
student_data
student_data <- 2
student_data
